home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Font / E / EMFont.cpt / EncycFon next >
Text File  |  1989-11-24  |  24KB  |  626 lines

  1. %!PS-Adobe-2.0
  2. %%Title: KeyMasterâ„¢ 1.0
  3. %%FontName: EncycloFont
  4. %%CreationDate: 11/24/89  Time: 4:27:08 AM 
  5. %%Pages: 0
  6. %%EndComments
  7. /_setpacking{systemdict /currentpacking known{setpacking}{pop}ifelse}bind def
  8. userdict /AltDT1 known{{currentfile (   ) readstring{(%%%) eq{exit}if}{pop}ifelse}loop}if
  9. true _setpacking userdict begin /AltDT1 220 dict def AltDT1 begin
  10. /B{bind def}bind def /bdf{bind def}bind def
  11. /ddef{AltDT1 3 1 roll put}B
  12. /_X{exch ddef}B
  13. /ndf{1 index where{pop pop pop}{dup xcheck{bind}if ddef}ifelse}B
  14. /ndf2{1 index where{pop pop pop}{ddef}ifelse}B
  15. /_ga{KMObj _curChar get exch get}B
  16. /_concat{_ga concat}B
  17. /_gs{KMStr _curChar get exch get}B
  18. /stringtype{{UCS}forall}B
  19. /arraytype{{{UCS}forall}forall}B
  20. /packedarraytype /exec load def
  21. /ucrk .5 ddef
  22. /ucrm .31 ddef
  23. /ucry .48 ddef
  24. /boostk 1.25 ddef
  25. /cvt1{1 exch sub 3 1 roll}B
  26. /cvt2{0 max 3 1 roll}B
  27. /ccmyk{dup 5 -1 roll sub 0 max exch}B 
  28. /BuildChar{AltDT1 begin exch begin BC2 end end}B
  29. /BC2{
  30.  /_QASave save ddef 1 setflat /showpage{}ddef /inverted? 0 currenttransfer exec .5 ge ddef
  31.  /setcmykcolor{1 exch sub ccmyk ccmyk ccmyk pop setrgbcolor}ndf2
  32.  /setcustomcolor{exch aload pop pop 4{4 index mul 4 1 roll}repeat setcmykcolor pop}ndf2
  33.  /_sg /setgray load ddef /_execLevel 0 ddef /_setrgb /setrgbcolor load ddef
  34.  Encoding exch get dup /_curChar _X dup CharStrings exch known not{pop/.notdef}if
  35.  CharStrings exch get newpath dup type exec _QASave restore
  36. }B
  37. /graytaper{frac mul add _sg}ddef
  38. /rgbtaper{frac mul add 5 -2 roll frac mul add 4 -2 roll frac mul add _setrgb}ddef
  39. /logtaper{/frac frac 9 mul 1 add log ddef}B
  40. /ffcn{clip (undefined ffcn) ==}B
  41. /colorfcn{0 1 0 1 0 1 rgbtaper}ddef /numsteps -0 ddef /numsteps1 -0 ddef
  42. /_setscreen{currentscreen /_proc _X /_angle _X /_freq _X dup /_setype _X
  43.  1 and 0 eq{pop}{_ga /_proc _X}ifelse
  44.  _setype 2 and 0 eq{pop}{/_angle _X}ifelse
  45.  _setype 4 and 0 eq{pop}{/_freq _X}ifelse
  46.  _freq _angle /_proc load setscreen
  47. }B
  48. /min{2 copy gt{exch}if pop}B
  49. /max{2 copy lt{exch}if pop}B
  50. /avg{add 2 div}B
  51. /absmax{2 copy abs exch abs gt{exch}if pop}B
  52. /calcstep{
  53.  /colorfcn load length 7 ge
  54.   {/colorfcn load 1 get /colorfcn load 3 get /colorfcn load 5 get absmax absmax}
  55.   {/colorfcn load 1 get}
  56.   ifelse
  57.  dup 0 ne{graystep div abs}if
  58.  dup /numsteps _X 1 sub dup 0 eq{pop 1}if
  59.  /numsteps1 _X
  60. }B
  61. /storerect{/top _X /right _X /bottom _X /left _X}B
  62. /rectpath{newpath left bottom moveto left top lineto right top lineto right bottom lineto closepath}B
  63. /recfill{_ga bind /colorfcn _X /_ang _X
  64.  gsave _ang rotate pathbbox storerect grestore
  65.  gsave ffcn _ang rotate calcstep
  66.  /delta top bottom sub numsteps div neg ddef
  67.  0 1 numsteps{
  68.   numsteps1 div /frac _X colorfcn /bottom top delta add ddef rectpath fill /top bottom ddef
  69.  }for
  70.  grestore newpath
  71. }B
  72. /radfill{
  73.  _ga bind /colorfcn _X /radius _X 
  74.  gsave pathbbox storerect grestore /x right left avg ddef /y top bottom avg ddef
  75.  calcstep gsave ffcn /delta radius numsteps div neg ddef
  76.  0 1 numsteps{
  77.   numsteps1 div /frac _X colorfcn newpath x y radius 0 360 arc fill
  78.   /radius radius delta add ddef
  79.  }for
  80.  grestore newpath
  81. }B
  82. /rectfill{/ffcn{clip}bind ddef recfill}B
  83. /eorectfill{/ffcn{eoclip}bind ddef recfill}B
  84. /radialfill{/ffcn{clip}bind ddef radfill}B
  85. /eoradialfill{/ffcn{eoclip}bind ddef radfill}B
  86. /setwid{0 setcharwidth KMMtx exch get concat}B
  87. /stringShow{_ga /ssf _X _ga /ssd _X _gs /sss _X 
  88.  0 1 sss length -1 add
  89.  {dup ssd exch get currentpoint exch pop moveto sss exch 1 getinterval ssf}for
  90. }B
  91. /Bshow{gsave setlinewidth dup false charpath stroke grestore show}B
  92. /Oshow{gsave [1 0 .21 1 0 0] concat show grestore}B
  93. /shadfreq 100 ddef
  94. /Outshow{gsave .25 setlinewidth false charpath stroke grestore}B
  95. /Sshow{gsave .06 mul dup neg rmoveto currentscreen 3 -1 roll shadfreq ge
  96.  {pop pop}
  97.  {shadfreq 3 1 roll setscreen}
  98.  ifelse
  99.  0.9 _sg dup show grestore show
  100. }B
  101. /_s /ashow load def /_ch (?) def
  102. /_S{{_ch 0 3 -1 roll put _ch false charpath currentpoint stroke moveto 2 copy rmoveto}
  103.  forall pop pop}B
  104. /_A{_a moveto _t exch 0 exch}B /_L{0 _l neg translate}B
  105. /a{gsave _concat /tf{_gs _A _s}ddef /ts{_gs _A _S _L}ddef}B
  106. /e{gsave _concat /tf{_gs _A _s}ddef /ts{_L pop}ddef}B
  107. /o{gsave _concat /tf{pop}ddef /ts{_L pop}ddef}B
  108. /r{gsave _concat /tf{pop}ddef /ts{_gs _A _S _L}ddef}B
  109. /tf{pop}ddef /ts{pop}ddef /_a 0 ddef /_t 0 ddef /_l 0 ddef
  110. /graystep 1 256 div def /bottom -0 ddef /colorfcn{}ddef /delta -0 ddef
  111. /_w{dup stringwidth exch 3 -1 roll length 1 sub _t mul add exch}B
  112. /_z [{0 0}bind{dup _w exch neg 2 div exch neg 2 div}bind{dup _w exch neg exch neg}bind] ddef
  113. /setfontinfo{_z exch get /_a _X /_t _X /_l _X
  114.  KMefn _curChar get 3 -1 roll get cvn findfont exch
  115.  /curtextmtx [ 2 index 0 0 2 index 0 0 ] ddef scalefont setfont}B
  116. /bottom -0 ddef
  117. /delta -0 ddef
  118. /frac -0 ddef
  119. /left -0 ddef
  120. /numsteps -0 ddef
  121. /numsteps1 -0 ddef
  122. /radius -0 ddef
  123. /right -0 ddef
  124. /top -0 ddef
  125. /x -0 ddef
  126. /y -0 ddef
  127. /df currentflat ddef
  128. /tempstr 1 string ddef
  129. /clipflatness 3 ddef
  130. /ffcn{}ddef
  131. /setdashpattern{KMObj _curChar get 3 -1 roll get exch setdash}B
  132. /_V{0 0 6 2 roll rcurveto}B
  133. /_Y{2 copy rcurveto}B
  134. /_Z{4 -2 roll 2 copy 6 4 roll rcurveto}B
  135. /_exec{_gs cvx exec}B
  136. /_show{_gs show}B
  137. /_restore{_QASave restore}ddef
  138. /_save{/_QASave save ddef}ddef
  139. /_execLevel 0 ddef /_curx -0 def /_cury -0 def
  140. /_lbrace{mark /_execLevel _execLevel 1 add ddef}B
  141. /_rbrace{/_execLevel _execLevel 1 sub ddef counttomark array astore cvx exch pop}B
  142. /setoverprint{pop}ndf
  143. /sf{dup 0 eq{pop df dup 3 mul}{dup}ifelse /clipflatness _X setflat}B
  144. /gettint{0 get}B
  145. /puttint{0 exch put}B
  146. /bc [0 0 0 0] ddef
  147. /c1 [0 0 0 0] ddef
  148. /c2 [0 0 0 0] ddef
  149. /newcmykcustomcolor{6 /packedarray where{pop packedarray}{array astore readonly}ifelse}ndf
  150. /_custcmyk /newcmykcustomcolor load def
  151. /inkoverprint false ndf
  152. /setinkoverprint{pop}ndf
  153. /overprintprocess{pop}ndf
  154. /setspotcolor{spots exch get 0 5 getinterval exch setcustomcolor}ndf
  155. /currentcolortransfer{currenttransfer dup dup dup}ndf
  156. /getprocessoverprint{0 ne{spots exch get 5 get}{pop false}ifelse}ndf
  157. /overprintprocess{aload pop 3 -1 0{exch getprocessoverprint 4 1 roll}for or or or setinkoverprint}ndf
  158. /currentoverprint false ndf
  159. /setcolor{dup length 4 eq
  160.  {aload overprintprocess setcmykcolor}
  161.  {aload 1 get spots exch get 5 get setinkoverprint setspotcolor}
  162.  ifelse
  163. }ndf
  164. /calcFH2step
  165. {c1 length 4 eq
  166.  {0 1 3{c1 1 index get c2 3 -1 roll get sub}for absmax absmax absmax}
  167.  {c1 gettint c2 gettint sub abs}ifelse
  168.  graystep div abs dup 0 eq{pop 1}if
  169.  dup /numsteps _X 1 sub dup 0 eq{pop 1}if /numsteps1 _X
  170. }B
  171. /cblend{
  172.  c1 length 4 eq
  173.  {
  174.   /bc c1 length array ddef
  175.   0 1 3
  176.   {bc exch
  177.    c1 1 index get
  178.    c2 2 index get
  179.    1 index sub
  180.    frac mul add put
  181.   }for
  182.  }{
  183.   /bc c1 aload length array astore ddef bc
  184.   c1 gettint
  185.   c2 gettint
  186.   1 index sub
  187.   frac mul add
  188.   puttint
  189.  }ifelse
  190.  bc setcolor
  191. }ddef
  192. /recFH2fill{
  193.  /cf _X
  194.  _ga /c2 _X
  195.  _ga /c1 _X
  196.  _ga /taperfcn _X
  197.  /_ang _X
  198.  gsave _ang rotate pathbbox storerect grestore
  199.  /topsv top ddef
  200.  clipflatness currentflat
  201.  calcFH2step
  202.  /delta top bottom sub numsteps div neg ddef
  203.  {
  204.   {
  205.    _ang rotate
  206.    clipflatness setflat cf
  207.    dup setflat
  208.    /top topsv ddef
  209.    0 1 numsteps1{
  210.     numsteps1 div /frac _X
  211.     taperfcn cblend
  212.     /bottom top delta add ddef
  213.     rectpath fill
  214.     /top bottom ddef
  215.    }for
  216.   }
  217.   clipflatness 100 le
  218.   {
  219.    gsave stopped grestore
  220.    {/clipflatness clipflatness 1.3 mul ddef}
  221.    {exit}
  222.    ifelse
  223.   }
  224.   {exec exit}
  225.   ifelse
  226.  }loop
  227.  newpath
  228.  setflat /clipflatness _X
  229. }B
  230. /rectFH2fill{{clip}recFH2fill}B
  231. /eorectFH2fill{{eoclip}recFH2fill}B
  232. /radFH2fill{
  233.  /cf _X
  234.  _ga /c2 _X
  235.  _ga /c1 _X
  236.  /radius _X
  237.  gsave pathbbox storerect grestore /x right left avg ddef /y top bottom avg ddef
  238.  clipflatness currentflat
  239.  calcFH2step{
  240.   {clipflatness setflat cf 0 1 numsteps1
  241.    {numsteps1 div /frac _X cblend
  242.    dup setflat
  243.    newpath x y radius 1 frac sub mul 0 360 arc{
  244.     {fill}stopped
  245.     {currentflat 1.3 mul dup setflat clipflatness gt{stop}if}{exit}ifelse
  246.     }loop
  247.    }for
  248.   }
  249.   clipflatness 100 le
  250.   {gsave stopped grestore
  251.   {/clipflatness clipflatness 1.3 mul ddef}{exit}ifelse}
  252.   {exec exit}
  253.   ifelse
  254.  }loop
  255.  newpath
  256.  setflat /clipflatness _X
  257. }B
  258. /radialFH2fill{{clip}radFH2fill}B
  259. /eoradialFH2fill{{eoclip}radFH2fill}B
  260. /fps{
  261.  currentflat exch dup 0 le{pop 1}if
  262.   {dup setflat 3 index stopped
  263.   {1.3 mul dup 3 index gt{pop setflat pop pop stop}if}{exit}ifelse
  264.   }loop pop setflat pop pop
  265. }B
  266. /fp{100 currentflat fps}B
  267. /rfp{clipflatness currentflat fps}B
  268. /fcp{100 clipflatness fps}B
  269. /fclip{{clip}fcp}B
  270. /feoclip{{eoclip}fcp}B
  271. /curtextmtx{}ddef
  272. /otw .25 ddef
  273. /makesetfont{dup /curtextmtx _X makefont setfont}B
  274. /curtextheight{.707104 .707104 curtextmtx dtransform dup mul exch dup mul add sqrt}B
  275. /ta{1 index
  276.  {tempstr 0 2 index put tempstr 2 index 
  277.   gsave exec grestore
  278.   tempstr stringwidth rmoveto
  279.   5 index eq{6 index 6 index rmoveto}if
  280.   3 index 3 index rmoveto
  281.  }forall 7{pop}repeat
  282. }B
  283. /sts{_ga setcolor /ts{awidthshow}ddef exec}ddef
  284. /stol{setlinewidth _ga setcolor newpath
  285.  /ts{{false charpath stroke}ta}ddef exec
  286. }ddef
  287. /sthv{_ga setcolor newpath dup
  288.  /ts{curtextheight .05 mul .5 max setlinewidth{false charpath stroke}ta}ddef exec
  289.  /ts{awidthshow}ddef exec
  290. }ddef
  291. /stob{_ga setcolor /ts{gsave [1. 0. .21 1. 0. 0.] concat awidthshow grestore}ddef exec}ddef
  292. /stsh{
  293.  /ts{curtextheight .06 mul dup neg rmoveto awidthshow
  294.  curtextheight .06 mul neg dup neg rmoveto}ddef
  295.  gsave currentscreen 3 -1 roll
  296.  100 ge{pop pop}{100 3 1 roll setscreen}ifelse
  297.  .9 _sg
  298.  1 index exec grestore
  299.  /ts{awidthshow}ddef
  300.  _ga setcolor exec
  301. }ddef
  302. /stfs1{
  303.  4 -2 roll 0 ne{0 ne setoverprint 5 index 5 index sts}{pop}ifelse 5 -1 roll pop
  304.  0 ne{0 ne setoverprint stol}{pop pop pop pop}ifelse false setoverprint
  305. }B
  306. /tonewline?{currentpoint pop right gt{newline}if}B
  307. /newline{currentpoint leading sub exch pop left exch moveto}B
  308. /donefilling?{currentpoint exch pop bottom lt}B
  309. /extrude{
  310.  /chg _X /deltay _X /deltax _X _ga /c1 _X
  311.  /top _X /right _X /bottom _X /left _X _ga /c2 _X
  312.  /factor .75 ddef
  313.  c1 length 2 eq 
  314.  {/c1 c1 spottoprocess ddef}if
  315.  c2 length 2 eq 
  316.  {/c2 c2 spottoprocess ddef}if
  317.  /cnt todraw ddef
  318.  /ts
  319.  {gsave currentpoint pop /xstart _X blockxoff wordxoff add yoff 
  320.   rmoveto scalef dup scale right left sub 2 div xstart left sub sub
  321.   neg curtextheight 2 div neg rmoveto awidthshow grestore
  322.  }ddef
  323.  1 1 todraw div neg 0
  324.  {
  325.   dup .02 le{pop 0}if /frac _X 
  326.   gsave cblend
  327.   dup exec
  328.   cnt 1 ne{grestore}if
  329.   /cnt cnt 1 sub ddef
  330.  }for 
  331.  /ts{gsave awidthshow grestore}ddef
  332.  c1 setcolor dup exec c2 setcolor 
  333.  curtextheight .005 mul setlinewidth
  334.  /ts{{false charpath stroke}ta}ddef exec 
  335.  grestore
  336. }ddef
  337. /blockxoff
  338.  {right left sub 2 div currentpoint pop left sub sub}ddef 
  339. /yoff
  340.  {curtextheight 2 div deltay todraw div cnt mul add}ddef 
  341. /wordxoff
  342.  {deltax todraw div cnt mul}ddef
  343. /todraw
  344. { deltax dup mul deltay dup mul add sqrt factor mul
  345.    100 chg sub abs factor mul add 
  346.    dup 0 le{pop 1}{round}ifelse
  347. }ddef
  348. /scalef
  349. { 100 chg sub abs 100 div todraw div cnt mul
  350.  chg 100 ge{1 add}{1 exch sub}ifelse
  351. }ddef
  352. /spottoprocess{
  353.  aload pop spots exch get aload pop pop pop
  354.  0 1 3{pop 4 index mul 4 -1 roll}for
  355.  4 array astore exch pop
  356. }B
  357. /s8 8 string ddef /pattnt 1 ddef /patcol[] ddef
  358. /_desobjdef{_ga exch _gs cvn _X}B
  359. /pa{1 0 matrix defaultmatrix dtransform exch atan}B
  360. /por{1 0 dtransform 0 eq exch 0 ne and}bdf
  361. /patcolor{/pattnt _X 
  362.  dup length array copy/patcol _X
  363.  systemdict/setcmykcolor known
  364.  {/pattnt 1 pattnt sub ddef
  365.   patcol length 4 eq
  366.   {0 1 3{patcol exch 2 copy
  367.    get .25 lt{0}{pattnt}ifelse put}for}
  368.   {patcol dup gettint .25 lt{0}{pattnt}ifelse puttint}ifelse 
  369.   patcol setcolor}
  370.  {patcol setcolor currentgray 1 ne{pattnt systemdict /setgray get exec}if}ifelse}ddef
  371. /pat{s8 copy pop 9.375 pa por not{-90. add}if
  372.  {1 add 4 mul cvi s8 exch get exch
  373.   1 add 4 mul cvi 7 sub bitshift 1 and inverted?{1 exch sub}if}setscreen
  374.   systemdict begin{}settransfer end
  375.   inverted?{.9921875 exch sub}if 64 div patcolor
  376. }B /_setcolor{_ga setcolor}ddef /_tendiv{10 div exch}B
  377. /_ts{_gs gsave /_str _X _tendiv _tendiv 5 -2 roll _tendiv _tendiv 5 2 roll _str ts grestore}ddef
  378. /_makesetfont{_ga makesetfont}B /_descvn{_gs cvn}B
  379. /_translate{_tendiv _tendiv translate}B /_desrfp{_ga rfp}B /_makefont{_ga makefont}B
  380. /_setgray{50 add 100 div _sg}ddef /_rgbdivroll{50 add 100 div 3 1 roll}B /_otwstol{otw stol}B
  381. /_desrgb{3{_rgbdivroll}repeat _setrgb}ddef /_desfp{_ga fp}B
  382. /_despat{_ga 3 1 roll _ga pat}B /_desRF{_gs RF}B /shortFF{_gs _FF}B /_desdef{_gs cvn _X}B
  383. /Esc[{rectfill}bind{eorectfill}bind{radialfill}bind{eoradialfill}bind{sts}bind
  384.  {a}bind{e}bind{r}bind{o}bind{tf}bind{ts}bind
  385.  {eofill}bind{clip}bind{eoclip}bind{setwid}bind{setfontinfo}bind
  386.  {setdashpattern}bind{dup}bind{_desdef}bind{_Z}bind{_save}bind
  387.  {_restore}bind{_descvn}bind{_concat}bind{_show}bind{_exec}bind
  388.  {pop}bind{stringShow}bind{shortFF}bind{_makefont}bind{setfont}bind
  389.  {_desRF}bind{lineto}bind{curveto}bind{rmoveto}bind{_desrfp}bind
  390.  {sf}bind{_desfp}bind{radialFH2fill}bind{eoradialFH2fill}bind{rectFH2fill}bind
  391.  {eorectFH2fill}bind{_ts}bind{_makesetfont}bind{fclip}bind{feoclip}bind
  392.  {_desobjdef}bind{stfs1}bind{_translate}bind{_desrgb}{sthv}bind
  393.  {stob}bind{_otwstol}bind{stsh}bind{extrude}bind{_setscreen}bind
  394.  {_despat}bind
  395. ]def
  396. /VVec[{100 sub}bind 199{dup}bind repeat{216 sub 100 mul add}bind 32{dup}bind repeat
  397.  {100 mul add}bind{10 div}bind{_setcolor}{rlineto}bind{rcurveto}bind
  398.  {closepath}bind{newpath}bind{fill}bind{stroke}bind{gsave}bind
  399.  {grestore}bind{_setgray}{setflat}bind{setlinewidth}bind{setlinejoin}bind
  400.  {setmiterlimit}bind{setlinecap}bind{_V}bind{_Y}bind{moveto}bind
  401.  {_lbrace}bind{_rbrace}bind{Esc exch get exec}bind 
  402. ] def
  403. /ZVec[{100 sub}bind 199{dup}bind repeat{216 sub 100 mul add}bind 32{dup}bind repeat
  404.  {100 mul add}bind{10 div}bind{{_setcolor}}{{rlineto}}bind
  405.  {{rcurveto}}bind{{closepath}}bind{{newpath}}bind{{fill}}bind
  406.  {{stroke}}bind{{gsave}}bind{{grestore}}bind{{_setgray}}
  407.  {{setflat}}bind{{setlinewidth}}bind{{setlinejoin}}bind{{setmiterlimit}}bind
  408.  {{setlinecap}}bind{{_V}}bind{{_Y}}bind{{moveto}}bind
  409.  {_lbrace{}}bind{_rbrace{}}bind{Esc exch get aload pop}bind
  410. ] def
  411. /UCS{dup 233 lt{dup}if _execLevel 0 eq 
  412.  {VVec exch get exec}
  413.  {ZVec exch get exec dup type /packedarraytype eq
  414.  1 index type /arraytype eq or 1 index xcheck and
  415.  {aload pop}if}ifelse
  416. }B
  417. /CD{/NF exch ddef{exch dup/FID ne{exch NF 3 1 roll put}
  418. {pop pop}ifelse}forall NF}B
  419. /MN{1 index length/Len exch ddef dup length Len add string dup
  420. Len 4 -1 roll putinterval dup 0 4 -1 roll putinterval}B
  421. /RC{(|______)anchorsearch{1 index MN cvn/NewN exch ddef cvn
  422. findfont dup maxlength dict CD dup/FontName NewN put dup
  423. /Encoding MacVec put NewN exch definefont pop}{pop}ifelse}B
  424. /RF{dup cvn FontDirectory exch known{pop}{RC}ifelse}B
  425. /_FF{dup FontDirectory exch known{findfont}{256 string cvs(|______)exch MN findfont}ifelse}B
  426. /MacVec 256 array ddef MacVec 0 /Helvetica findfont
  427. /Encoding get 0 128 getinterval putinterval MacVec 127 /DEL put
  428. MacVec 16#27 /quotesingle put  MacVec 16#60 /grave put/NUL/SOH/STX/ETX
  429. /EOT/ENQ/ACK/BEL/BS/HT/LF/VT/FF/CR/SO/SI/DLE/DC1/DC2/DC3/DC4/NAK/SYN
  430. /ETB/CAN/EM/SUB/ESC/FS/GS/RS/US MacVec 0 32 getinterval astore pop
  431. /Adieresis/Aring/Ccedilla/Eacute/Ntilde/Odieresis/Udieresis/aacute
  432. /agrave/acircumflex/adieresis/atilde/aring/ccedilla/eacute/egrave
  433. /ecircumflex/edieresis/iacute/igrave/icircumflex/idieresis/ntilde/oacute
  434. /ograve/ocircumflex/odieresis/otilde/uacute/ugrave/ucircumflex/udieresis
  435. /dagger/degree/cent/sterling/section/bullet/paragraph/germandbls
  436. /registered/copyright/trademark/acute/dieresis/notequal/AE/Oslash
  437. /infinity/plusminus/lessequal/greaterequal/yen/mu/partialdiff/summation
  438. /product/pi/integral/ordfeminine/ordmasculine/Omega/ae/oslash
  439. /questiondown/exclamdown/logicalnot/radical/florin/approxequal/Delta/guillemotleft
  440. /guillemotright/ellipsis/nbspace/Agrave/Atilde/Otilde/OE/oe
  441. /endash/emdash/quotedblleft/quotedblright/quoteleft/quoteright/divide/lozenge
  442. /ydieresis/Ydieresis/fraction/currency/guilsinglleft/guilsinglright/fi/fl
  443. /daggerdbl/periodcentered/quotesinglbase/quotedblbase
  444. /perthousand/Acircumflex/Ecircumflex/Aacute
  445. /Edieresis/Egrave/Iacute/Icircumflex/Idieresis/Igrave/Oacute/Ocircumflex
  446. /apple/Ograve/Uacute/Ucircumflex/Ugrave/dotlessi/circumflex/tilde
  447. /macron/breve/dotaccent/ring/cedilla/hungarumlaut/ogonek/caron
  448. MacVec 128 128 getinterval astore pop end end
  449. %%%%%%
  450. false _setpacking
  451. %%EndProlog
  452. /$EncycloFont 19 dict def AltDT1 begin $EncycloFont begin/PaintType 0 def/FontType 3 def
  453. /FontBBox[0 239 6987 4000]def
  454. /FontMatrix[0.000250 0 0 0.000250 0 0]def/InvMtx[4000 0 0 4000 0 0]def
  455. /CharStrings 257 dict def/FontName (EncycloFont) def
  456. /BuildChar{AltDT1/BuildChar get exec}def
  457. /FontInfo 3 dict def FontInfo begin
  458. /UnderlinePosition 133 def/UnderlineThickness 0 def end % FontInfo
  459. /Encoding AltDT1/MacVec get def CharStrings begin/.notdef <646478E972FF> def
  460. /comma<65A7A6E972FF64F564F964F789F668F8646474FFA18DE96484E9FC64574AE9EC
  461. 99DE6AE0EC96DE07CBEC6EDB91D9EC33D2C1E5ECA3E270EC4950E99674E9ECEE32F4F06F
  462. 89E9A380E9FC6489DBEC19D264EC643FD5ECAFDE64ECEE32F4F0C77EE9A380E9FC6489DB
  463. EC19D264EC643FD5ECAFDE64ECEE32F4F0BB74E9A380E9FC6489DBEC19D264EC643FD5EC
  464. AFDE64ECEE32F4F0AFDEA380E9FC6489DBEC19D264EC643FD5ECAFDE64ECEE32F4F0>
  465. def 
  466. /period<66A783E972FF64F564F964F782F668F8646474FFA4DE887DE9FC641D50E9EC76
  467. DD8BDEEC73DD60CDEC92DA73D9EC55D368E3EC8FE064EC5D54E975E5ECEE32F4F08EE088
  468. 7DE9FCBADC29EC6476D9EC0ED429EC32F4F0BEDFA27EE9FCBADB65DBEC10B9EC62D50ED5
  469. EC32F4F0A4DE727FE9FC9FBADCEC52D764EC9F0ED4EC32F4F08ADDA27EE9FC63D5BADBEC
  470. 0F0FECBADB63D5EC32F4F0BADC887DE9FC0ED49FEC6452D7ECBADC9FEC32F4F08ADD6E7C
  471. E9FC0ED562D5ECB910EC65DBBADBEC32F4F0>def 
  472. /slash<676C96E972FF64F564F964F7A5F668F8646474FF64B8DF76DF646473FF656AFF
  473. 32F4646DFF32F4646EFF32F4656DFF32F4656EFF32F4666DFF32F4666EFFF3666AFF32F4
  474. 676DFF32F4676EFF32F4686DFF32F4686EFF32F4696DFF32F4696EFFF3>def 
  475. /a<68A783E972FF64F564F964F77CF668F8646474FF6A7DE97678E9FC4FD7C6D95CD56E
  476. DB47D36EDBED56D56405D433D730D233D7ED2CD76448D595D931D295D9ED2ED5644DD20C
  477. D620D230D1ED1F53D1C2DC18C96EE118C9EDABD96481DA77D96DDC77D9EDB3D9648ADA51
  478. D76DDC51D7EDADDA646EDEAADBBDDF7FE0ED5CD677D933D590DB33D565DEED6496DA85D9
  479. A8DC84DBBEDDEDEE32F4F080F6B1E4967AE9FC8CDCB293DF6DDDAADE96E1ED3CD41635D1
  480. 5BD31ED232CFEDEE32F4F0>def 
  481. /c<69A788E972FF64F564F964F783F66EF8646474FF7777E97777E9FC3ED264EC643ED2
  482. EC8ADE64EC65EAA3E4EC64BDDB88DA9CDE7DDE9CDEEDBDDB649CDE21D69CDE2CD2ED640B
  483. D521D64BD22CD24BD2ED5FD464EC6AEA78DAEC68DC64EC95DA6488DC9BD988DC69DCED64
  484. 96DA0ED788DC40D488DCED32D6645FD40ED75FD440D4ED640C52E9EC6432D69CD940D469
  485. DC40D4ED95DA6488DCBAD988DC88DCED6495DA0ED769DC40D469DCED60D464EC5EEA78DA
  486. EC69DC63EAECBDDB649CDE40D69CDE4BD2ED640BD521D62CD22CD22CD2ED0BD5644BD2A7
  487. DA4BD29CDEED62EA69DCEC3ED264EC645FD4EC640BD540D62CD24BD22CD2ED0BD5642CD2
  488. A7DA2CD29CDEED64BDDBA7DA7DDE9CDE7DDEED69DC65EAEC5EEA50D6EC60D464EC32D664
  489. 40D42CD740D45FD4ED6432D6BAD940D488DC40D4ED96DA6469DCBAD968DC88DCED64BC76
  490. E9EC6496DA2DD788DC60D488DCED32D66440D40ED740D440D4ED6432D6BAD95FD488DC5F
  491. D4ED68DC64EC68EA50D6EC5FD465EAEC0BD5642CD288DA2CD27DDEED64BDDBA7DA9CDE9C
  492. DE9CDEEDBDDB647DDE21D67DDE2CD2ED68EA5FD4EC8ADE64EC6450D6ECEE32F4F0>
  493. def 
  494. /d<6A858FE972FF64F564F964F782F66EF8646474FF9C90E9AFDAFC3649E964EC49CB7D
  495. E5EC85E57DE5EC8C7FE964EC64324AE9ECAFDA19D6EC646484E9EC4845E964EC6154E964
  496. 54E9EC6774E96454E9EC8083E964EC19D6AFDAECEE32F4F068F8B27DE9C7E7FC28D22AD2
  497. ECC4D904D7ECA1DE9DDEEC9BDE2FD2ECC1D9C1D9EC2BD29DDEEC9EDE9EDEEC05D7C3D9EC
  498. 28D22CD2EC2ED29EDEEC04D704D7EC9FDE29D2ECEE32F4F0>def 
  499. /e<6B858FE972FF64F564F964F78AF668F8646474FF9B90E9A27EE9FC2654E92654E9EC
  500. 324EE964EC06D742D1EC7E7CE964EC4CD687E0ECB4DA64ECC3D943D1EC6E74E96A74E9EC
  501. C5DA1CEC6351E96251E9EC4446E964EC86DBA6E4EC8577E98677E9EC737BE964EC6422D6
  502. EC5D4EE964EC2254E92054E9EC8C77E964EC8577E98677E9EC97DB03CCEC03D6ABEC13D7
  503. BCDEECEE32F4F0>def 
  504. /f<6CA78DE972FF64F564F964F782F66EF8646474FFAFDAAFDAFC927FE964EC7FE57DE5
  505. EC43CB7DE5EC3C49E964EC64324AE9EC19D619D6EC646484E9EC8083E964EC6774E96454
  506. E9EC6154E96454E9EC4845E964ECAFDAAFDAECEE32F4F068F89979E9C7E7FC9FDE2AD2EC
  507. 05D704D7EC27D29DDEEC2DD22FD2EC06D7C1D9EC9DDE9DDEEC2AD29EDEECC4D9C3D9EC9F
  508. DE2CD2EC9ADE9EDEECC5D904D7EC29D229D2ECEE32F4F0>def 
  509. /k<6D858AE972FF64F564F964F782F668F8646474FFC587E9AFDAFC4E43E964EC64967E
  510. E9EC7A85E964EC64324AE9ECAFDA19D6EC646484E9EC1C3EE964EC646444E9ECAC8AE964
  511. EC19D6AFDAECEE32F4F0BF7CE9C3E1FC2953E964EC6419D6EC9F75E964EC64AFDAECEE32
  512. F4F06BE2697AE9FC64AFDAEC19D664EC6419D6ECAFDA64ECEE32F4F09575E9697AE9FC64
  513. AFDAEC19D664EC6419D6ECAFDA64ECEE32F4F0BF7CE9697AE9FC64AFDAEC19D664EC6419
  514. D6ECAFDA64ECEE32F4F08C83E9697AE9FC64AFDAEC19D664EC6419D6ECAFDA64ECEE32F4
  515. F06BE2A2E6FC64AFDAEC19D664EC6419D6ECAFDA64ECEE32F4F09575E9A2E6FC64AFDAEC
  516. 19D664EC6419D6ECAFDA64ECEE32F4F0BF7CE9A2E6FC64AFDAEC19D664EC6419D6ECAFDA
  517. 64ECEE32F4F0A580E978DFFCAFDA64EC6475E2EC19D664EC6453CEECEE32F4F0>def 
  518. /l<6E648CE972FF64F564F964F786F668F8646474FFB07BE98680E9FC534FE9574FE9EC
  519. 6426D4ECA2DC64EC9B74E99C74E9EC6422D5EC34C933C9EC48D064EC6480E0ECB07BE9AC
  520. 7BE9ECB17BE91C4DE9EC6448D0EC48D064EC33C995E7EC64A6DBEC9C74E92C54E9ECA2DC
  521. 64EC64A2DCEC524FE97179E9ECEE32F4F0>def 
  522. /n<6F6496E972FF64F564F964F79AF668F8646474FFA1A2E964FCB9DE64EC1245E96484
  523. E9EC1145E96444E9ECBCDE64ECC37CE9697DE9ECC57CE95F4BE9ECEE32F4F06EF8767EE9
  524. 6484E9FC524AE964EC6462CBEC66E564EC74E566E5ECEE32F4F06D95E96484E9FC767EE9
  525. 64EC6462CBEC62CB64EC54CB66E5ECEE32F4F0>def 
  526. /o<70A78DE972FF64F564F964F786F66EF8646474FF89DAA381E9FCA5E464ECAA78E91E
  527. 50E9EC98E264EC89DA89DAEC29CD64EC1E50E9AA78E9EC4454E964EC6447CDEC9DE364EC
  528. AC78E91D50E9EC8474E964EC6482E3EC3FD63FD6EC642CD2EC23CC64EC1D50E9AB78E9EC
  529. 31CE64EC649BDEECEE32F4F0937FE96484E9FC7279E964EC6447CDEC3FD688DAEC649CDE
  530. EC1CCC64EC9BDE2CD2EC75DE64EC89DA40D6EC10CF64EC46CD81E3ECEE32F4F0>def 
  531. /r<71858AE972FF64F564F964F797F668F8646474FFAD95E96484E9FC641FCBEC2143E9
  532. 64EC64A9E5EC5E54E96354E9EC6A74E901C9EC64A7E5EC838AE964EC648576E9EC24D464
  533. ECEE32F4F0>def 
  534. /s<72858FE972FF64F564F964F781F668F8646474FF6485E5FCBEE164EC6443CBEC9B75
  535. E964EC63D665DAEC2ECB64EC6484E5EC04D264ECADE5AEE5ECAEE51ACBEC03D264EC6444
  536. CBEC65DA63D6EC6485E5ECBEE164EC2052E9A776E9EC2152E92152E9ECEE32F4F0>
  537. def 
  538. /t<73858FE972FF64F564F964F781F668F8646474FFA482E96474E9FC5E54E96474E9EC
  539. 641BCEEC2ACA64EC642ECEEC9EE664EC641BCEEC6A74E96474E9ECEE32F4F09789E9C7DB
  540. FC64667CE9EC27D664EC64624CE9ECA1DA64ECEE32F4F0>def 
  541. /z<74858AE972FF64F564F964F798D9F668F8646474FF81C1E98579E9FC64A7E2ECA7E2
  542. 64EC646444E9EC0461D7E964EC646484E9ECA7E264EC6421CEECA2B6E964EC32F4F0>
  543. def 
  544. end %CharDefs 
  545. /KMefn 17 dict def KMefn begin
  546. /slash [(|______Helvetica)] def
  547. end % KMefn
  548. KMefn {{RF} forall pop} forall
  549. /KMStr 17 dict def KMStr begin
  550. /slash 6 array def slash dup 0 [ (\251\61989)(McClelland)(& Danuloff)(from the book)
  551. (Encyclopedia)(Macintosh)] putinterval pop
  552. end true _setpacking % KMefn
  553. /KMObj 17 dict def KMObj begin
  554. /comma 1 array def comma dup 0 [
  555. [ ]
  556. ] putinterval pop
  557. /period 1 array def period dup 0 [
  558. [ ]
  559. ] putinterval pop
  560. /slash 3 array def slash dup 0 [
  561. [ ]
  562. [ 1 0 0 1 0 2578.572266 ]
  563. [ 1 0 0 1 0 162.246094 ]
  564. ] putinterval pop
  565. /a 1 array def a dup 0 [
  566. [ ]
  567. ] putinterval pop
  568. /c 1 array def c dup 0 [
  569. [ ]
  570. ] putinterval pop
  571. /d 1 array def d dup 0 [
  572. [ ]
  573. ] putinterval pop
  574. /e 1 array def e dup 0 [
  575. [ ]
  576. ] putinterval pop
  577. /f 1 array def f dup 0 [
  578. [ ]
  579. ] putinterval pop
  580. /k 1 array def k dup 0 [
  581. [ ]
  582. ] putinterval pop
  583. /l 1 array def l dup 0 [
  584. [ ]
  585. ] putinterval pop
  586. /n 1 array def n dup 0 [
  587. [ ]
  588. ] putinterval pop
  589. /o 1 array def o dup 0 [
  590. [ ]
  591. ] putinterval pop
  592. /r 1 array def r dup 0 [
  593. [ ]
  594. ] putinterval pop
  595. /s 1 array def s dup 0 [
  596. [ ]
  597. ] putinterval pop
  598. /t 1 array def t dup 0 [
  599. [ ]
  600. ] putinterval pop
  601. /z 1 array def z dup 0 [
  602. [ ]
  603. ] putinterval pop
  604. end % KMobj
  605. /KMMtx [[1 0 0 1 0 0]
  606. [ 1.00  0.00  0.00  1.00 320.00 -480.00]
  607. [ 1.15  0.00  0.00  1.15 320.00 -320.00]
  608. [ 1.00  0.00  0.00  1.00  0.00 -0.00]
  609. [ 1.00  0.00  0.00  1.00 320.00 -160.00]
  610. [ 1.00  0.00  0.00  1.00 280.00 -169.00]
  611. [ 0.80  0.00  0.00  0.80 160.00 -160.00]
  612. [ 0.80  0.00  0.00  0.80 160.00 -160.00]
  613. [ 0.80  0.00  0.00  0.80 160.00 -160.00]
  614. [ 0.80  0.00  0.00  0.80 160.00 -160.00]
  615. [ 0.75  0.00  0.00  0.75 160.00 -160.00]
  616. [ 0.60  0.00  0.00  0.60 160.00 -160.00]
  617. [ 0.75  0.00  0.00  0.75 160.00 -160.00]
  618. [ 0.60  0.00  0.00  0.60 160.00 -160.00]
  619. [ 1.00  0.00  0.00  1.00 320.00 -160.00]
  620. [ 1.00  0.00  0.00  1.00 160.00 -160.00]
  621. [ 0.30  0.00  0.00  0.30 320.00 -0.00]
  622. ] def false _setpacking
  623. end %$EncycloFont
  624. end %AltDT1
  625. /EncycloFont $EncycloFont definefont pop
  626.